home *** CD-ROM | disk | FTP | other *** search
/ PC Open 100 / PC Open 100 CD 2.bin / CD2 / PDF / Corsi / webdeveloper / lezione_2 / daticompleti2.asp < prev    next >
Encoding:
Text File  |  2004-10-01  |  1.3 KB  |  51 lines
  1. <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
  2.  
  3. <html>
  4. <head>
  5.     <title>Un form</title>
  6. </head>
  7.  
  8. <body>
  9.  
  10. <%
  11. Dim strHobby
  12. Dim blnMusica
  13.  
  14. blnMusica = false
  15. strHobby = request.form("chk_hobby")
  16.  
  17. For Each hobby in request.form("chk_hobby")
  18.     If hobby = "Musica" Then
  19.         blnMusica = true
  20.     End If
  21. Next
  22.  
  23. %>
  24.  
  25. <% if blnMusica = true Then %>
  26. <p>Caro <%=request.Form("txt_nome")%>, ho visto che ti interessi di musica. Ti dispiace indicarmi il nome del tuo cantante o gruppo preferito?</p>
  27. <form action="visdaticompleti2.asp" method="post">
  28.  
  29. <input type="hidden" name="txt_nome" value="<%=request.Form("txt_nome")%>">
  30. <input type="hidden" name="txt_cognome" value="<%=request.Form("txt_cognome")%>">
  31. <input type="hidden" name="rad_sesso" value="<%=request.Form("rad_sesso")%>">
  32. <input type="hidden" name="sel_eta" value="<%=request.Form("sel_eta")%>">
  33. <input type="hidden" name="chk_hobby" value="<%=request.Form("chk_hobby")%>">
  34. <input type="hidden" name="txa_note" value="<%=request.Form("txa_note")%>">
  35.  
  36. Cantante o gruppo preferito <input type="text" name="txt_cantante">
  37.  
  38. <input type="submit" value="Invia">
  39.  
  40. </form>
  41.  
  42. <% else %>
  43.  
  44.  
  45. <p>Grazie per aver inviato i tuoi commenti, peccato non ti interessi di musica!</p>
  46.  
  47. <% end if %>
  48.  
  49. </body>
  50. </html>
  51.